
## test for model functions
##

test.isSVM <- function() {

}
